To run a profile of BUGMF:
(assuming that freq...qerf in BUGMF.CH has been turned on and counts gathered)

.r psform↔mf.psc/super/force/indent:1↔mf84.psc↔
.et mf84.psc/999f  [and then ↑E to exit]
.copy counts←↓<!mf!>↓.txt[tex,sys]

In COUNTS:
Delete the first count (it's the number of counts).
Add a count of -1 at the end.

In MF84.PSC:
Fix broken comments like {508
		:}
[Search for {<cr>, {:<cr>, <sp>:}, and <sp>}; you'll find about half a dozen.]

Also shorten the long strings that start with `! MF.POOL'; e.g., change to
      Writeln(tty,'! MF.POOL check sum loses.');
     Writeln(tty,'! MF.POOL doesn''t match.');
     Writeln(tty,'! MF.POOL line bad.');

[If we had counts from production runs, we'd also want to
add comment of {↑} in jumpout, fatalerror, overflow, confusion.
e.g., "procedure jumpout{↑};" "procedure overflow(...){↑};".]

Then,
.r profile.dek
PASCALFILE:mf84.psc
COUNTFILE:counts
OUTPUT:mf84.lst

after which
.dover mf84.lst/font=sail6/head/xlines=5
makes a listing (about 200 pages of hardcopy)